home *** CD-ROM | disk | FTP | other *** search
/ Planet Source Code Jumbo …e CD Visual Basic 1 to 7 / 1_2002.ISO / Data / Zips / Linksys Ro271229282001.psc / basLinkyIPMailThem.bas next >
Encoding:
BASIC Source File  |  2001-09-20  |  366 b   |  10 lines
  1. Attribute VB_Name = "basLinkyIPMailThem"
  2. Option Explicit
  3.  
  4. Public Declare Function GetSystemMenu Lib "user32" (ByVal hwnd As Long, ByVal bRevert As Long) As Long
  5.  
  6. Public Declare Function RemoveMenu Lib "user32" (ByVal hMenu As Long, ByVal nPosition As Long, ByVal wFlags As Long) As Long
  7.     
  8. Public Const SC_CLOSE = &HF060&
  9. Public Const MF_BYCOMMAND = &H0&
  10.